home *** CD-ROM | disk | FTP | other *** search
- #[document 21.15 32.05 162.95 162.5
- static oe="odd_even",nzw="nonzero_winding",wc="winding_counting";
- static stroked="stroked";
- static vert="vertical",horz="horizontal";
- static miter="miter",bevel="bevel",round="round";
- static butt="butt",proj="projected";
- #[page
- auto m=move,l=line,c=curve;
- auto p;
- gc_cspace("Lab");
- gc_color(100.0,0.0,0.0);
- rect(0,0,0,0);
- auto ng=draw(path());
- auto s=array(ng);
- m(139.80,32.05);
- c(139.80,32.05,44.30,32.05,44.30,32.05);
- c(44.30,32.05,44.30,123.60,44.30,123.60);
- c(44.30,123.60,107.95,123.60,139.80,123.60);
- c(139.80,105.30,139.80,68.70,139.80,68.70);
- l(72.40,68.70);
- l(72.40,52.85);
- l(139.80,52.85);
- c(139.80,52.85,139.80,32.05,139.80,32.05);
- close_edge();
- m(72.40,105.85);
- l(72.40,89.50);
- l(111.75,89.50);
- l(111.75,105.85);
- l(72.40,105.85);
- close_edge();
- p=path();
- gc_draw_style(oe);
- gc_color(0.00,0.00,0.00);
- s[0]=draw(p);
- m(112.35,162.50);
- l(110.25,135.20);
- l(128.40,135.20);
- l(126.35,162.50);
- l(112.35,162.50);
- close_edge();
- p=path();
- s[1]=draw(p);
- m(21.15,119.65);
- l(92.05,160.90);
- l(162.95,119.65);
- l(21.15,119.65);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]over=s[2];
- s[0]over=s[1];
- page:=s[0];
- s=NULL;
- #]page
- #]document
-